home *** CD-ROM | disk | FTP | other *** search
/ 17 Bit Software 6: Level 6 / 17 Bit - Level 6 (1998)(Epic Marketing)[!].iso / quartz / q1166.dms / q1166.adf / Interplay4.0ß / Interplay.Install < prev    next >
Text File  |  1997-04-10  |  1KB  |  67 lines
  1. ; Installer script for Interplay
  2.  
  3. (set dirname
  4.     (askdir
  5.         (prompt "Where would you like Interplay to be installed?\n(No drawer will be made)")
  6.         (help @askdir-help)
  7.         (default "c:")
  8.     )
  9. )
  10.  
  11. (set @default-dest dirname)
  12.  
  13. (copyfiles
  14.     (prompt "Copying Interplay to desired place.")
  15.     (help @copyfiles-help)
  16.     (source "Interplay")
  17.     (dest dirname)
  18.     (infos)
  19.     (confirm)
  20. )
  21.  
  22. (set guidename
  23.     (askdir
  24.         (prompt "Where would you like the documentation to be installed?")
  25.         (help @askdir-help)
  26.         (default dirname)
  27.     )
  28. )
  29.  
  30. (copyfiles
  31.     (prompt "Copying Interplay.Guide to desired place.")
  32.     (help @copyfiles-help)
  33.     (source "Interplay.Guide")
  34.     (dest guidename)
  35.     (infos)
  36.     (confirm)
  37. )
  38.  
  39. (copyfiles
  40.     (prompt "Copying preferences files to Env:")
  41.     (help @copyfiles-help)
  42.     (source "env/")
  43.     (dest "ENV:")
  44.     (all)
  45.     (confirm)
  46. )
  47. (copyfiles
  48.     (prompt "Copying preferences files to Envarc:")
  49.     (help @copyfiles-help)
  50.     (source "env/")
  51.     (dest "ENVARC:")
  52.     (all)
  53.     (confirm)
  54. )
  55.  
  56. (if
  57.     (exists "s:interplay.list")
  58.     (message "Interplay list allready exists. Will NOT copy a new one.")
  59.     (copyfiles
  60.             (prompt "Copying Interplay.list to s:")
  61.             (help @copyfiles-help)
  62.             (source "s/Interplay.list")
  63.             (dest "s:")
  64.             (confirm)
  65.     )
  66. )
  67.